home *** CD-ROM | disk | FTP | other *** search
/ Scene 96 / Scene 96 International Edition (Zyklop Software) (Disc 2) (1997).iso / misc / coding / one_scrs / asm / t1.asm < prev    next >
Encoding:
Assembly Source File  |  1996-07-19  |  1.1 KB  |  52 lines
  1.         .386p
  2.         .model flat, c
  3.         locals
  4.         .code
  5.  
  6.         extrn   texture   :dword
  7.         extrn   vmem      :dword
  8.         extrn   angrad    :dword
  9.  
  10.         tunincer        db      1
  11.  
  12. public  tunincer
  13. public  tunnel1
  14.  
  15. tunnel1:pushad
  16.         mov     dx,oldx
  17.         mov     edi,vmem
  18.         mov     esi,texture
  19.         xor     ebp,ebp
  20.         xor     ebx,ebx
  21.         xor     eax,eax
  22.         add     dl,tunincer
  23.         add     dh,tunincer
  24.         mov     cx,32000
  25. loopd:  mov     ax,word ptr [angrad+2*ebp]
  26.         add     ah,dh
  27.         mov     bl,al
  28.         add     bl,dl
  29.         add     ah,stb0[ebx]
  30.         mov     ax,[esi+eax]
  31.         shr     al,1
  32.         shr     ah,1
  33.         mov     [edi+ebp],ax
  34.         inc     ebp
  35.         inc     ebp
  36.         dec     ecx
  37.         jnz     loopd
  38.         mov     oldx,dx
  39.         popad
  40.         ret
  41.  
  42. include asm\tunnel0.inc
  43. include asm\tunnel1.inc
  44. include asm\tunnel3.inc
  45.  
  46.         xsi     dd      0
  47.         xdi     dd      0
  48.         xdx     dd      0
  49.         xbp     dd      0
  50.         oldx    dw      0
  51. end
  52.